home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ShareWare OnLine 2
/
ShareWare OnLine Volume 2 (CMS Software)(1993).iso
/
comm2
/
tguquit.zip
/
WAIT8902.ZIP
/
WAIT8902.DOC
< prev
Wrap
Text File
|
1989-02-06
|
4KB
|
118 lines
wait - version 8902 February 6, 1989
*****************************************************************************
* wait - version 8902 February 6, 1989 *
* compiled with MSC 5.10; command line: cl /Ox wait.c *
* *
* *
* Copyright (C) 1989 Larry Fox; ALL RIGHTS RESERVED *
* *ShareWare* from Opus (1:368/19.0) 1-407-879-3020 *
* *
* *
*****************************************************************************
This program is meant to be used in a batch file that will test for
errorlevels 0 thru 2. Errorlevel 0 is returned when the pause time
expires. Errorlevel 1 is returned to your batch file if a space, tab
or return character is pressed. This is what is meant by the term
whitespace. Errorlevel 2 is returned if a letter or number key is
detected.
wait - version 8902 February 6, 1989
The following batch files should give you the general idea. The first
one is for testing purposes.
echo off
cls
echo Pausing for 30 seconds. Press the space bar for errorlevel 1.
echo Press a letter or number for errorlevel 2. Program will time-
echo out with errorlevel 0 in thirty seconds if no key is pressed.
wait 30
if errorlevel 3 goto error
if errorlevel 2 goto e2
if errorlevel 1 goto e1
if errorlevel 0 echo errorlevel = 0 (go for main-engine start)
goto end
:e1
echo errorlevel = 1 (whitespace)
goto end
:e2
echo errorlevel = 2 (non-whitespace)
goto end
:error
eek a bug!
:end
This is my autoexec.bat that runs the Genesis Project. Normally
BinkleyTerm will automatically start after the 30 second pause,
but if I happen to be at the keyboard and get impatient I can also
type a letter or number key to cut the nonsense and start my BBS.
echo off
prompt $p $g
path=c:\;c:\dos;c:\dos\util
SET TZ=EST5
SET BINKLEY=C:\BINKLEY
cls
echo - -
echo ----------------------------------------------------------------
echo - Binkley will start in 30 seconds. Tap the space bar to exit -
echo ----------------------------------------------------------------
echo - -
wait 30
if errorlevel 2 goto e2
if errorlevel 1 goto e1
rem if errorlevel 0 (normal time-out) or a letter or number is hit
rem BinkleyTerm will start.
:e2
cls
echo Loading BinkleyTerm
cd c:\binkley
binkley
:e1
echo Who tapped the space bar?
:end
wait - version 8902 February 6, 1989
That should about do it...now for the good part.
This program is self-registering. [huh?] Here's how you can get
your *ShareWare* copy registered.
1: *Share* some of your valuable time and/or expertise with a
fellow modem junkie.
2: Support the FidoNet Experience...any way you can. If you aren't
sure how you could do that, a good way would be to join the
International FidoNet Association. Anyone can join and you can
find an application in the Fido Newsletters that are available
for download on most good bulletin boards.
Anything of the sort will do it. Use your imagination if you want.
Thank You
Larry Fox
Genesis Project SDS: Port Saint Lucie FL
Opus (1:368/19.0) 1-407-879-3020